// startup

j=sqrt(-1);

exec('servo.mtl');

exec('kzud1.mtl');

// r= [ -0.5 -0.5 -0.5 -0.5];

r= [ 0 0 0 0 ];

exec('polfest.mtl');

beta= 1;

nn= 10;

exec('schritt.mtl');

plot(y);


RETURN